home *** CD-ROM | disk | FTP | other *** search
- ; ICDB - Installscript
- ; $VER:ICDB Installscript 1.0
-
- (set #getdir "Wo soll ICDB installiert werden?\n(ICDB-Unterverzeichnis wird ersellt)")
-
- (if (exists "Work:" (NOREQ))
- (set default-dir "Work:")
- (set default-dir "Sys:")
- )
-
- (set @default-dest default-dir)
-
- ; path erfragen
- (set #icdbdir
- (askdir
- (prompt #getdir)
- (help @askdir-help)
- (default @default-dest)
- )
- )
- (set #icdbpath (tackon #icdbdir "ICDB"))
- ; für Log-File
- (set @atdir #icdbpath)
- (set @default-dest @atdir)
-
- ; installieren
- (working "Installiere ICDB")
- (makedir #icdbpath)
- ; verzeichnispiktorgramm
- (copyfiles
- (source "ICDB.info")
- (dest #icdbdir)
- )
- (copyfiles
- (source "icdbfont")
- (dest "FONTS:")
- (newname "icdb")
- (all)
- )
- (copyfiles
- (source "icdb.font")
- (dest "FONTS:")
- )
- (copyfiles
- (source "icdb/")
- (dest #icdbpath)
- (all)
- )
- (copyfiles
- (source "icdb.guide")
- (dest #icdbpath)
- )
- (copyfiles
- (source "icdb.guide.info")
- (dest #icdbpath)
- )
-
- (if (exists "LIBS:reqtools.library" (NOREQ))
- (set dummy "dummy")
- (message "\n\n\n\nSie benöigen noch die\n\nreqtools.library V38")
- )
- (message "\nICDB wurde erfolgreich installiert.\n\n\nViel Spaß!")
- (exit (quiet))
-